# TODO: Add comment
# 
# Author: wuping
###############################################################################


populationToppp=function(population){
	return(ppp(x=population@x,y=population@y,
					window=owin(c(0,population@plotdim[1]),c(0,population@plotdim[2]))))
}
